(find-function-search-for-symbol): Bind case-fold-search when searching.

diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el
index 99ad46c88b097cd0ecb6c858d769aa921eb7d5f9..8850273b49171cce0f8bc563a09e6de10ab4c42f 100644 (file)
--- a/lisp/emacs-lisp/find-func.el
+++ b/lisp/emacs-lisp/find-func.el
@@ -139,7 +139,8 @@ If VARIABLE-P is nil, `find-function-regexp' is used, otherwise
                                  find-variable-regexp
                                find-function-regexp)
                              (regexp-quote (symbol-name symbol))))
-             (syn-table (syntax-table)))
+             (syn-table (syntax-table))
+             (case-fold-search))
          (unwind-protect
              (progn
                (set-syntax-table emacs-lisp-mode-syntax-table)